# -*- mode: snippet -*-
# name: shiny server renderCachedPlot
# key: shiny.server.renderCachedPlot
# key: shiny_server_renderCachedPlot
# key: renderCachedPlot_shiny_server
# contributor: Shuguang Sun
# --
output$plot <- renderCachedPlot(
${1:expr},
cacheKeyExpr = {list(${2:input$n})})